# NOT RUN {
# plot a Landscape object
data(maize_65)
plot(maize.landscape)
# plot pollen dispersion at time 61 for maize data
## create a ToxicIntensityRaster object
tox<-array(0,c(61,1024,1024))
tox[61,,]<-as.matrix(maize.toxicintensity61)
attr(tox,"class") <- "ToxicIntensityRaster"
## plot tox over the landscape at time 61
plot(maize.landscape,objectT=tox,time=61)
# }
Run the code above in your browser using DataLab